(quail-update-leim-list-file): Print the

offending file name if some of its quail-define-package forms is
broken.

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index af694c79503a869cbc31f617b160da41b74cb5ce..6bd30316125da49797139f9310d7ba905e968928 100644 (file)
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -2801,7 +2801,7 @@ of each directory."
                (error
                 ;; Ignore the remaining contents of this file.
                 (goto-char (point-max))
-                (message "Some part of \"%s\" is broken" dirname)))))
+                (message "Some part of \"%s\" is broken" (car pkg-list))))))
          (setq pkg-list (cdr pkg-list)))
        (setq quail-dirs (cdr quail-dirs) dirnames (cdr dirnames))))